#include "Socket.hpp"
#include "Log.hpp"
#include <sys/select.h>
#include <sys/time.h>
#include <sys/types.h>
#include <unistd.h>

static const uint16_t defaultport = 8888;
static const int fd_num_max = sizeof(fd_set) * 8;
int defaultfd = -1;

class SelectServer
{
public:
    SelectServer(const uint16_t _port = defaultport) : port(_port)
    {
        for (int i = 0; i < fd_num_max; i++)
        {
            fd_array[i] = defaultfd;
        }
    }

    void Init()
    {
        _listensockfd.Socket();
        _listensockfd.Bind(port);
        _listensockfd.Listen();
        std::cout << "success Init" << std::endl;
    }

    void start()
    {
        int listensockfd = _listensockfd.Getfd();
        fd_array[0] = listensockfd;

        for (;;)
        {
            fd_set rfds;
            FD_ZERO(&rfds);

            // 寻找文件描述符集中最大fd
            int maxfd = fd_array[0];
            for (int i = 0; i < fd_num_max; i++)
            {
                if (fd_array[i] == defaultfd)
                    continue;
                FD_SET(fd_array[i], &rfds); // 添加新的文件描述符到位图中
                if (maxfd < fd_array[i])
                {
                    maxfd = fd_array[i];
                    sleep(1);
                    lg(INFO, "The largest file descriptor is: %d", maxfd);
                }
            }

            // struct timeval timeout = {0, 0};
            // int n = select(maxfd + 1, &rfds, nullptr, nullptr, &timeout);
            // struct timeval timeout = {2, 0};
            int n = select(maxfd + 1, &rfds, nullptr, nullptr, nullptr);
            // int n = select(maxfd + 1 /*maxfd + 1*/, &rfds, nullptr, nullptr, nullptr);

            switch (n)
            {
            case 0:
                // std::cout << "timeout: " << timeout.tv_sec << std::endl;
                // std::cout << "timeout..." << std::endl;
                break; // 超时，没有文件描述符就绪
            case -1:
                std::cout << "select error" << std::endl;
                break;
            default:
                sleep(1);
                // std::cout << "事件已经就绪" << " timeout: " << timeout.tv_sec << std::endl;
                std::cout << "get a nwe link" << std::endl;
                Dispatcher(rfds); // 对就绪事件进行派发
                break;
            }
        }
    }

     void Dispatcher(fd_set &rfds) // 事件分配器
    {
        for (int i = 0; i < fd_num_max; i++)
        {
            int fd = fd_array[i];
            if (fd == defaultfd)
                continue;
            if (FD_ISSET(fd, &rfds)) // FD_ISSET大于0，就代表文件描述符就绪
            {
                if (_listensockfd.Getfd() == fd)
                {
                    Accepter();
                }
                else
                {
                    Recver(fd, i);
                }
            }
        }
    }

    void Accepter()
    {
        std::string clientip;
        uint16_t clientport = 0;
        int sock = _listensockfd.Accept(clientip, clientport);
        if(sock < 0) return;
        lg(INFO, "accept success, %s %d", clientip, clientport);

        int pos = 1;
        for (; pos < fd_num_max; pos++)
        {
            if (fd_array[pos] != defaultfd)
                continue;
            break;
        }

        // 判断fd_array是否为满, 满则关闭该文件描述符，否则添加到数组fd_array中
        if (pos == fd_num_max)
        {
            lg(WARNING, "server full!, now close %d", sock);
            close(sock);
        }
        else
        {
            fd_array[pos] = sock;
            Printfd();
        }
    }

    void Recver(int fd, int pos)
    {
        char buffer[1024];
        int n = recv(fd, buffer, sizeof(buffer) - 1, 0);
        if (n > 0)
        {
            buffer[n] = 0;
            std::cout << "get a massage: " << buffer << std::endl;
        }
        else if (n == 0) // 缓冲区中已经没有数据，此时应该关闭文件，并更新fd_array数组
        {
            lg(INFO, "client quit, close fd: %d", fd);
            close(fd);
            fd_array[pos] = defaultfd;
        }
        else
        {
            lg(ERROR, "read error, fd is %d", fd);
            close(fd);
            fd_array[pos] = defaultfd;
        }
    }

   

    void Printfd()
    {
        for (int i = 0; i < fd_num_max; i++)
        {
            if (fd_array[i] != defaultfd)
            {
                std::cout << fd_array[i] << " ";
            }
        }
        std::cout << "\n";
    }

    ~SelectServer() {}

private:
    Sock _listensockfd;
    uint16_t port;
    int fd_array[fd_num_max];
};

// #pragma once

// #include <iostream>
// #include <sys/select.h>
// #include <sys/time.h>
// #include "Socket.hpp"

// using namespace std;

// static const uint16_t defaultport = 8888;
// static const int fd_num_max = (sizeof(fd_set) * 8);
// int defaultfd = -1;

// class SelectServer
// {
// public:
//     SelectServer(uint16_t port = defaultport) : _port(port)
//     {
//         for (int i = 0; i < fd_num_max; i++)
//         {
//             fd_array[i] = defaultfd;
//             // std::cout << "fd_array[" << i << "]" << " : " << fd_array[i] << std::endl;
//         }
//     }
//     bool Init()
//     {
//         _listensock.Socket();
//         _listensock.Bind(_port);
//         _listensock.Listen();

//         return true;
//     }
//     void Accepter()
//     {
//         // 我们的连接事件就绪了
//         std::string clientip;
//         uint16_t clientport = 0;
//         int sock = _listensock.Accept(clientip, clientport); // 会不会阻塞在这里？不会
//         if (sock < 0) return;
//         lg(INFO, "accept success, %s: %d, sock fd: %d", clientip.c_str(), clientport, sock);

//         // sock -> fd_array[]
//         int pos = 1;
//         for (; pos < fd_num_max; pos++) // 第二个循环
//         {
//             if (fd_array[pos] != defaultfd)
//                 continue;
//             else
//                 break;
//         }
//         if (pos == fd_num_max)
//         {
//             lg(WARNING, "server is full, close %d now!", sock);
//             close(sock);
//         }
//         else
//         {
//             fd_array[pos] = sock;
//             PrintFd();
//             // TODO
//         }
//     }
//     void Recver(int fd, int pos)
//     {
//         // demo
//         char buffer[1024];
//         ssize_t n = read(fd, buffer, sizeof(buffer) - 1); // bug?
//         if (n > 0)
//         {
//             buffer[n] = 0;
//             cout << "get a messge: " << buffer << endl;
//         }
//         else if (n == 0)
//         {
//             lg(INFO, "client quit, me too, close fd is : %d", fd);
//             close(fd);
//             fd_array[pos] = defaultfd; // 这里本质是从select中移除
//         }
//         else
//         {
//             lg(WARNING, "recv error: fd is : %d", fd);
//             close(fd);
//             fd_array[pos] = defaultfd; // 这里本质是从select中移除
//         }
//     }
//     void Dispatcher(fd_set &rfds)
//     {
//         for (int i = 0; i < fd_num_max; i++) // 这是第三个循环
//         {
//             int fd = fd_array[i];
//             if (fd == defaultfd)
//                 continue;

//             if (FD_ISSET(fd, &rfds))
//             {
//                 if (fd == _listensock.Getfd())
//                 {
//                     Accepter(); // 连接管理器
//                 }
//                 else // non listenfd
//                 {
//                     Recver(fd, i);
//                 }
//             }
//         }
//     }
//     void start()
//     {
//         int listensock = _listensock.Getfd();
//         fd_array[0] = listensock;
//         for (;;)
//         {
//             fd_set rfds;
//             FD_ZERO(&rfds);

//             int maxfd = fd_array[0];
//             for (int i = 0; i < fd_num_max; i++) // 第一次循环
//             {
//                 if (fd_array[i] == defaultfd)
//                     continue;
//                 FD_SET(fd_array[i], &rfds);
//                 if (maxfd < fd_array[i])
//                 {
//                     maxfd = fd_array[i];
//                     sleep(1);
//                     lg(INFO, "max fd update, max fd is: %d", maxfd);
//                 }
//             }

//             // accept?不能直接accept！检测并获取listensock上面的事件，新连接到来，等价于读事件就绪

//             // struct timeval timeout = {1, 0}; // 输入输出，可能要进行周期的重复设置
//             struct timeval timeout = {0, 0}; // 输入输出，可能要进行周期的重复设置
//             // 如果事件就绪，上层不处理，select会一直通知你！
//             // select告诉你就绪了，接下来的一次读取，我们读取fd的时候，不会被阻塞
//             // rfds: 输入输出型参数。 1111 1111 -> 0000 0000
//             int n = select(maxfd + 1, &rfds, nullptr, nullptr, /*&timeout*/ nullptr);
//             switch (n)
//             {
//             case 0:
//                 cout << "time out, timeout: " << timeout.tv_sec << "." << timeout.tv_usec << endl;
//                 break;
//             case -1:
//                 cerr << "select error" << endl;
//                 break;
//             default:
//                 // 有事件就绪了，TODO
//                 cout << "get a new link!!!!!" << endl;
//                 Dispatcher(rfds); // 就绪的事件和fd你怎么知道只有一个呢？？？
//                 break;
//             }
//         }
//     }
//     void PrintFd()
//     {
//         cout << "online fd list: ";
//         for (int i = 0; i < fd_num_max; i++)
//         {
//             if (fd_array[i] == defaultfd)
//                 continue;
//             cout << fd_array[i] << " ";
//         }
//         cout << endl;
//     }
//     ~SelectServer()
//     {
//         _listensock.Close();
//     }

// private:
//     Sock _listensock;
//     uint16_t _port;
//     int fd_array[fd_num_max];   // 数组, 用户维护的！
//     // int wfd_array[fd_num_max];
// };